home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / BUSITION / DENTAS2.LZH / GO2.BAT < prev    next >
DOS Batch File  |  1992-04-02  |  4KB  |  163 lines
  1. Echo off
  2. IF NOT EXIST INPUT.COM GOTO WRONGDR
  3. cls
  4. echo  
  5. ECOH  Welcome the installation procedure for Dentist's Assistant [TM]!
  6. ECHO                      [disk 2 of 2]
  7. echo  
  8. echo  
  9. ECHO Well, we're one half through.  The rest is even easier than   
  10. ECHO the first part.
  11. echo  
  12. ECHO Would you like to the install this program on a Hard Drive?
  13. echo  
  14. ECHO [If just starting this process, 'GO' begins it on disk one]
  15. echo  
  16. echo  
  17. :YESNO
  18. YESNO
  19. CLS
  20. IF ERRORLEVEL 89 IF NOT ERRORLEVEL 90 GOTO YES
  21. IF ERRORLEVEL 78 IF NOT ERRORLEVEL 79 GOTO YES1
  22. GOTO YESNO
  23. :YESNEXT
  24. CLS
  25. ECHO For you to install this program on a hard drive, this disk must be on Drive A.
  26. ECHO Is this floppy on drive A now?
  27. echo  
  28. YESNO
  29. CLS
  30. IF ERRORLEVEL 89 IF NOT ERRORLEVEL 90 GOTO YES 
  31. IF ERRORLEVEL 78 IF NOT ERRORLEVEL 79 GOTO NO1
  32. GOTO YESNEXT
  33. :YES1
  34. CLS
  35. ECHO Would you like to install this program on a floppy-based system?
  36. echo  
  37. YESNO
  38. CLS
  39. IF ERRORLEVEL 89 IF NOT ERRORLEVEL 90 GOTO YES2
  40. IF ERRORLEVEL 78 IF NOT ERRORLEVEL 79 GOTO END
  41. GOTO YES1
  42. :YES
  43. CLS
  44. echo  
  45. ECOH ══════════ Select the Hard drive you want to install the program on: ══════════
  46. echo  
  47. echo  
  48. echo           C = Drive C           D = Drive D
  49. echo           E = Drive E           F = Drive F
  50. echo           G = Drive G
  51. :INPUT
  52. echo  
  53. echo  
  54.              INPUT            (Pick a letter.)
  55. IF ERRORLEVEL 72 GOTO INPUT
  56. IF ERRORLEVEL 71 GOTO G
  57. IF ERRORLEVEL 70 GOTO F     
  58. IF ERRORLEVEL 69 GOTO E     
  59. IF ERRORLEVEL 68 GOTO D     
  60. IF ERRORLEVEL 67 GOTO C     
  61. IF ERRORLEVEL 67 GOTO C
  62. REM IF ERRORLEVEL 66 GOTO B
  63. REM IF ERRORLEVEL 65 GOTO A
  64. GOTO INPUT
  65. :C
  66. CLS
  67. echo  
  68. DDR
  69. if ERRORLEVEL 4 INSTALL4 H C E:
  70. if ERRORLEVEL 3 INSTALL4 H C D:
  71. if ERRORLEVEL 2 INSTALL4 H C C:
  72. if ERRORLEVEL 1 INSTALL4 H C B:
  73. if ERRORLEVEL 0 INSTALL4 H C A:
  74. GOTO END
  75. :D
  76. CLS
  77. echo  
  78. DDR
  79. if ERRORLEVEL 4 INSTALL4 H D E:
  80. if ERRORLEVEL 3 INSTALL4 H D D:
  81. if ERRORLEVEL 2 INSTALL4 H D C:
  82. if ERRORLEVEL 1 INSTALL4 H D B:
  83. if ERRORLEVEL 0 INSTALL4 H D A:
  84. GOTO END
  85. :E
  86. CLS
  87. echo  
  88. DDR
  89. if ERRORLEVEL 4 INSTALL4 H E E:
  90. if ERRORLEVEL 3 INSTALL4 H E D:
  91. if ERRORLEVEL 2 INSTALL4 H E C:
  92. if ERRORLEVEL 1 INSTALL4 H E B:
  93. if ERRORLEVEL 0 INSTALL4 H E A:
  94. GOTO END
  95. :F
  96. CLS
  97. echo  
  98. DDR
  99. if ERRORLEVEL 4 INSTALL4 H F E:
  100. if ERRORLEVEL 3 INSTALL4 H F D:
  101. if ERRORLEVEL 2 INSTALL4 H F C:
  102. if ERRORLEVEL 1 INSTALL4 H F B:
  103. if ERRORLEVEL 0 INSTALL4 H F A:
  104. GOTO END
  105. :G
  106. CLS
  107. echo  
  108. DDR
  109. if ERRORLEVEL 4 INSTALL4 H G E:
  110. if ERRORLEVEL 3 INSTALL4 H G D:
  111. if ERRORLEVEL 2 INSTALL4 H G C:
  112. if ERRORLEVEL 1 INSTALL4 H G B:
  113. if ERRORLEVEL 0 INSTALL4 H G A:
  114. GOTO END
  115. :NO
  116. CLS
  117. echo  
  118. ECHO To install this for a floppy based system, this disk must be on Drive B.
  119. GOTO END
  120. :NO1
  121. CLS
  122. GOTO END
  123. :YES2
  124. CLS
  125. echo  
  126. ECHO Beginning with version 4.0 of this program, it will not operate 
  127. ECHO on a floppy-based system.  
  128. echo  
  129. GOTO END
  130. echo  
  131. ECHO This disk must be on drive B to manufacture those three disks. 
  132. ECHO Each disk must be 720 kb or greater.
  133. ECHO Are you in drive B now?
  134. echo  
  135. YESNO
  136. CLS
  137. IF ERRORLEVEL 89 IF NOT ERRORLEVEL 90 GOTO YES3
  138. IF ERRORLEVEL 78 IF NOT ERRORLEVEL 79 GOTO NO3
  139. GOTO YES2
  140. :YES3
  141. CLS
  142. INSTALL4 F 2
  143. :NO3
  144. CLS
  145. echo  
  146. echo To install this program, move this disk to drive B and re-execute 'GO2' there.
  147. GOTO END
  148. :NO2
  149. CLS
  150. echo  
  151. :WRONGDR
  152. CLS
  153. echo  
  154. echo  
  155. ECHO Though nothing could be simpler than this install procedure, it does   
  156. echo require that you enter the drive name, such as 'A:' or 'B:', followed
  157. echo by the 'Enter' key.  After that, please enter 'GO2' again.
  158. echo  
  159. GOTO END
  160. :END
  161. echo  
  162.  
  163.